mov ax, cs
mov ds, ax
mov es, ax
mov ss, ax
mov sp, 0x7c00

mov ax, 3
int 0x10

mov bp, message + 0x7c00
mov ax, 0x1301
mov bx, 0x0007
mov cx, message_len
mov dx, 0
int 0x10

jmp $

message:
  db "Hello, world!", 0
message_len equ $ - message

times 510-($-$$) db 0
db 0x55, 0xaa
